object ChgCouleur2Form: TChgCouleur2Form Left = 320 Top = 186 ActiveControl = BOk BorderStyle = bsDialog Caption = 'Remplacer une gamme' ClientHeight = 257 ClientWidth = 427 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False Position = poMainFormCenter OnCreate = FormCreate OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 16 Width = 51 Height = 13 Caption = 'Couleur 1 :' end object LblN2: TLabel Left = 16 Top = 152 Width = 48 Height = 13 Caption = 'Tol'#233'rance' end object Label2: TLabel Left = 16 Top = 72 Width = 51 Height = 13 Caption = 'Couleur 2 :' end object LblN: TLabel Left = 16 Top = 116 Width = 33 Height = 13 Alignment = taCenter AutoSize = False Caption = '0'#176 end object BAnnuler: TButton Left = 336 Top = 216 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' TabOrder = 0 OnClick = BAnnulerClick end object BOk: TButton Left = 256 Top = 216 Width = 75 Height = 25 Caption = 'Ok' Default = True TabOrder = 1 OnClick = BOkClick end object BApercu: TButton Left = 16 Top = 216 Width = 75 Height = 25 Caption = 'Aper'#231'u' TabOrder = 3 OnClick = BApercuClick end object TBN2: TTrackBar Left = 10 Top = 168 Width = 407 Height = 33 Max = 200 PageSize = 5 Frequency = 5 Position = 30 TabOrder = 2 ThumbLength = 15 OnChange = TBN2Change end object ColorEdit1: TColorEdit Left = 16 Top = 32 Width = 89 Height = 22 BorderStyle = bsSingle Color = clAqua CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False TabOrder = 4 TabStop = True OnChange = ColorEdit1Change end object PnlCouleur: TPanel Left = 16 Top = 88 Width = 33 Height = 21 BevelOuter = bvLowered Color = clRed ParentBackground = False TabOrder = 5 end object Panel2: TPanel Left = 52 Top = 88 Width = 362 Height = 21 BevelOuter = bvLowered TabOrder = 6 object ImgDegrade: TImage Left = 1 Top = 1 Width = 360 Height = 19 Align = alClient OnMouseDown = ImgDegradeMouseDown end end object TBN: TTrackBar Left = 47 Top = 112 Width = 373 Height = 25 Max = 359 PageSize = 10 Frequency = 10 TabOrder = 7 ThumbLength = 15 TickMarks = tmTopLeft OnChange = TBNChange end end